home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 April: Mac OS SDK / Dev.CD Apr 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Start.a < prev    next >
Encoding:
Text File  |  1998-02-12  |  11.6 KB  |  352 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Start.a
  3. ;
  4. ;    Contains:    Start Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.1
  8. ;
  9. ;    Copyright:    © 1987-1993, 1996-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__START__') = 'UNDEFINED' THEN
  19. __START__ SET 1
  20.  
  21.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  22.     include 'MacTypes.a'
  23.     ENDIF
  24.     IF &TYPE('__FILES__') = 'UNDEFINED' THEN
  25.     include 'Files.a'
  26.     ENDIF
  27.  
  28. ; 
  29. ;    Important: When the major version number of kExtensionTableVersion and the value
  30. ;    returned by gestaltExtensionTableVersion change, it indicates that the Extension
  31. ;    Table startup mechanism has radically changed and code that doesn't know about
  32. ;    the new major version must not attempt to use the Extension Table startup
  33. ;    mechanism.
  34. ;    
  35. ;    Changes to the minor version number of kExtensionTableVersion indicate that the
  36. ;    definition of the ExtensionElement structure has been extended, but the fields
  37. ;    defined for previous minor versions of kExtensionTableVersion have not changed.
  38. ;
  39.  
  40.  
  41. kExtensionTableVersion            EQU        $00000100            ; current ExtensionTable version (1.0.0) 
  42. ;  ExtensionNotification message codes 
  43.  
  44. extNotificationBeforeFirst        EQU        0                    ; Before any extensions have loaded 
  45. extNotificationAfterLast        EQU        1                    ; After all extensions have loaded 
  46. extNotificationBeforeCurrent    EQU        2                    ; Before extension at extElementIndex is loaded 
  47. extNotificationAfterCurrent        EQU        3                    ; After extension at extElementIndex is loaded 
  48. ExtensionElement        RECORD 0
  49. fileName                 ds        Str31            ; offset: $0 (0)        ;  The file name 
  50. parentDirID                 ds.l    1                ; offset: $20 (32)        ;  the file's parent directory ID 
  51. ;  and everything after ioNamePtr in the HParamBlockRec.fileParam variant 
  52. ioVRefNum                 ds.w    1                ; offset: $24 (36)        ;  always the real volume reference number (not a drive, default, or working dirID) 
  53. ioFRefNum                 ds.w    1                ; offset: $26 (38)
  54. ioFVersNum                 ds.b    1                ; offset: $28 (40)
  55. filler1                     ds.b    1                ; offset: $29 (41)
  56. ioFDirIndex                 ds.w    1                ; offset: $2A (42)        ;  always 0 in table 
  57. ioFlAttrib                 ds.b    1                ; offset: $2C (44)
  58. ioFlVersNum                 ds.b    1                ; offset: $2D (45)
  59. ioFlFndrInfo             ds        FInfo            ; offset: $2E (46)
  60. ioDirID                     ds.l    1                ; offset: $3E (62)
  61. ioFlStBlk                 ds.w    1                ; offset: $42 (66)
  62. ioFlLgLen                 ds.l    1                ; offset: $44 (68)
  63. ioFlPyLen                 ds.l    1                ; offset: $48 (72)
  64. ioFlRStBlk                 ds.w    1                ; offset: $4C (76)
  65. ioFlRLgLen                 ds.l    1                ; offset: $4E (78)
  66. ioFlRPyLen                 ds.l    1                ; offset: $52 (82)
  67. ioFlCrDat                 ds.l    1                ; offset: $56 (86)
  68. ioFlMdDat                 ds.l    1                ; offset: $5A (90)
  69. sizeof                     EQU *                    ; size:   $5E (94)
  70.                         ENDR
  71. ; typedef struct ExtensionElement *        ExtensionElementPtr
  72.  
  73. ExtensionTableHeader    RECORD 0
  74. extTableHeaderSize         ds.l    1                ; offset: $0 (0)        ;  size of ExtensionTable header ( equal to offsetof(ExtensionTable, extElements[0]) ) 
  75. extTableVersion             ds.l    1                ; offset: $4 (4)        ;  current ExtensionTable version (same as returned by gestaltExtTableVersion Gestalt selector) 
  76. extElementIndex             ds.l    1                ; offset: $8 (8)        ;  current index into ExtensionElement records (zero-based) 
  77. extElementSize             ds.l    1                ; offset: $C (12)        ;  size of ExtensionElement 
  78. extElementCount             ds.l    1                ; offset: $10 (16)        ;  number of ExtensionElement records in table (1-based) 
  79. sizeof                     EQU *                    ; size:   $14 (20)
  80.                         ENDR
  81. ExtensionTable            RECORD 0
  82. extTableHeader             ds        ExtensionTableHeader ; offset: $0 (0)    ;  the ExtensionTableHeader 
  83. extElements                 ds        ExtensionElement ; offset: $14 (20) <-- really an array of length one ;  one element for each extension to load 
  84. sizeof                     EQU *                    ; size:   $72 (114)
  85.                         ENDR
  86. ; typedef struct ExtensionTable *        ExtensionTablePtr
  87.  
  88. ; typedef ExtensionTablePtr *            ExtensionTableHandle
  89.  
  90. DefStartRec                RECORD 0
  91. sdExtDevID                 ds.b    1                ; offset: $0 (0)
  92. sdPartition                 ds.b    1                ; offset: $1 (1)
  93. sdSlotNum                 ds.b    1                ; offset: $2 (2)
  94. sdSRsrcID                 ds.b    1                ; offset: $3 (3)
  95.                          ORG 0
  96. sdReserved1                 ds.b    1                ; offset: $0 (0)
  97. sdReserved2                 ds.b    1                ; offset: $1 (1)
  98. sdRefNum                 ds.w    1                ; offset: $2 (2)
  99. sizeof                     EQU *                    ; size:   $4 (4)
  100.                         ENDR
  101. ; typedef union DefStartRec *            DefStartPtr
  102.  
  103. DefVideoRec                RECORD 0
  104. sdSlot                     ds.b    1                ; offset: $0 (0)
  105. sdsResource                 ds.b    1                ; offset: $1 (1)
  106. sizeof                     EQU *                    ; size:   $2 (2)
  107.                         ENDR
  108. ; typedef struct DefVideoRec *            DefVideoPtr
  109.  
  110. DefOSRec                RECORD 0
  111. sdReserved                 ds.b    1                ; offset: $0 (0)
  112. sdOSType                 ds.b    1                ; offset: $1 (1)
  113. sizeof                     EQU *                    ; size:   $2 (2)
  114.                         ENDR
  115. ; typedef struct DefOSRec *                DefOSPtr
  116.  
  117. ;
  118. ; pascal void GetDefaultStartup(DefStartPtr paramBlock)
  119. ;
  120.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  121.         ; parameters:
  122.         ;    paramBlock      => A0
  123.         _GetDefaultStartup:    OPWORD    $A07D
  124.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  125.         IMPORT_CFM_FUNCTION GetDefaultStartup
  126.     ENDIF
  127.  
  128. ;
  129. ; pascal void SetDefaultStartup(DefStartPtr paramBlock)
  130. ;
  131.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  132.         ; parameters:
  133.         ;    paramBlock      => A0
  134.         _SetDefaultStartup:    OPWORD    $A07E
  135.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  136.         IMPORT_CFM_FUNCTION SetDefaultStartup
  137.     ENDIF
  138.  
  139. ;
  140. ; pascal void GetVideoDefault(DefVideoPtr paramBlock)
  141. ;
  142.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  143.         ; parameters:
  144.         ;    paramBlock      => A0
  145.         _GetVideoDefault:    OPWORD    $A080
  146.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  147.         IMPORT_CFM_FUNCTION GetVideoDefault
  148.     ENDIF
  149.  
  150. ;
  151. ; pascal void SetVideoDefault(DefVideoPtr paramBlock)
  152. ;
  153.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  154.         ; parameters:
  155.         ;    paramBlock      => A0
  156.         _SetVideoDefault:    OPWORD    $A081
  157.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  158.         IMPORT_CFM_FUNCTION SetVideoDefault
  159.     ENDIF
  160.  
  161. ;
  162. ; pascal void GetOSDefault(DefOSPtr paramBlock)
  163. ;
  164.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  165.         ; parameters:
  166.         ;    paramBlock      => A0
  167.         _GetOSDefault:    OPWORD    $A084
  168.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  169.         IMPORT_CFM_FUNCTION GetOSDefault
  170.     ENDIF
  171.  
  172. ;
  173. ; pascal void SetOSDefault(DefOSPtr paramBlock)
  174. ;
  175.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  176.         ; parameters:
  177.         ;    paramBlock      => A0
  178.         _SetOSDefault:    OPWORD    $A083
  179.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  180.         IMPORT_CFM_FUNCTION SetOSDefault
  181.     ENDIF
  182.  
  183. ;
  184. ; pascal void SetTimeout(short count)
  185. ;
  186.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  187.         Macro
  188.         _SetTimeout
  189.             move.w              #$0001,A0
  190.             dc.w                $A07F
  191.         EndM
  192.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  193.         IMPORT_CFM_FUNCTION SetTimeout
  194.     ENDIF
  195.  
  196. ;
  197. ; pascal void GetTimeout(short *count)
  198. ;
  199.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  200.         Macro
  201.         _GetTimeout
  202.             sub.l               A0,A0
  203.             dc.w                $A07F
  204.         EndM
  205.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  206.         IMPORT_CFM_FUNCTION GetTimeout
  207.     ENDIF
  208.  
  209. ; 
  210. ;    InstallExtensionNotificationProc
  211. ;
  212. ;    Installs an ExtensionNotificationUPP.
  213. ;
  214. ;    Parameters:
  215. ;        extNotificationProc    The ExtensionNotificationUPP to install.
  216. ;
  217. ;    Results:
  218. ;        noErr        0        The ExtensionNotificationUPP was installed.
  219. ;        paramErr    -50        This ExtensionNotificationUPP has already been installed.
  220. ;        memFullErr    -108    Not enough memory to install the ExtensionNotificationUPP.
  221. ;
  222.  
  223. ;
  224. ; pascal OSErr InstallExtensionNotificationProc(ExtensionNotificationUPP extNotificationProc)
  225. ;
  226.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  227.         Macro
  228.         _InstallExtensionNotificationProc
  229.             moveq               #0,D0
  230.             dc.w                $AA7D
  231.         EndM
  232.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  233.         IMPORT_CFM_FUNCTION InstallExtensionNotificationProc
  234.     ENDIF
  235.  
  236.  
  237. ; 
  238. ;    RemoveExtensionNotificationProc
  239. ;
  240. ;    Removes an ExtensionNotificationUPP.
  241. ;    
  242. ;    Note:    ExtensionNotificationUPPs can't call RemoveExtensionNotificationProc.
  243. ;
  244. ;    Parameters:
  245. ;        extNotificationProc    The ExtensionNotificationUPP to remove.
  246. ;
  247. ;    Results:
  248. ;        noErr        0        The ExtensionNotificationUPP was removed.
  249. ;        paramErr    -50        The ExtensionNotificationUPP was not found, or
  250. ;                            RemoveExtensionNotificationProc was called from within
  251. ;                            a ExtensionNotificationUPP (ExtensionNotificationUPPs can't
  252. ;                            call RemoveExtensionNotificationProc).
  253. ;
  254.  
  255. ;
  256. ; pascal OSErr RemoveExtensionNotificationProc(ExtensionNotificationUPP extNotificationProc)
  257. ;
  258.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  259.         Macro
  260.         _RemoveExtensionNotificationProc
  261.             moveq               #1,D0
  262.             dc.w                $AA7D
  263.         EndM
  264.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  265.         IMPORT_CFM_FUNCTION RemoveExtensionNotificationProc
  266.     ENDIF
  267.  
  268.  
  269. ; 
  270. ;    InstallExtensionTableHandlerProc
  271. ;
  272. ;    Installs an ExtensionTableHandlerUPP. Control is taken away from the system's default
  273. ;    handler and the ExtensionTableHandlerUPP is responsible for all changes to the
  274. ;    ExtensionTable (except for incrementing extElementIndex between extensions). This is
  275. ;    always the first handler called with extNotificationBeforeFirst and
  276. ;    extNotificationBeforeCurrent messages and the last handler called with
  277. ;    extNotificationAfterLast and extNotificationAfterCurrent messages. extElementIndex
  278. ;    is always incremented immediately after the ExtensionTableHandlerUPP is called with
  279. ;    the extNotificationAfterCurrent message.
  280. ;    
  281. ;    There can only be one ExtensionTableHandler installed.
  282. ;    
  283. ;    Warning:    The only safe time to change what ExtensionElement is at
  284. ;                ExtensionTable.extElements[extElementIndex] is when your
  285. ;                ExtensionTableHandlerUPP is called with the extNotificationAfterCurrent
  286. ;                message. You may change the ExtensionTable or the extElementIndex at other
  287. ;                times, but you must ensure that the ExtensionElement at
  288. ;                ExtensionTable.extElements[extElementIndex] stays the same.
  289. ;                
  290. ;    Note:        If the ExtensionTable or the contents of the folders included in the
  291. ;                ExtensionTable are changed after installing an ExtensionTableHandler,
  292. ;                RemoveExtensionTableHandlerProc cannot be called.
  293. ;
  294. ;    Parameters:
  295. ;        extMgrProc            The ExtensionTableHandlerUPP to install.
  296. ;        extTable            A pointer to an ExtensionTableHandle where
  297. ;                            InstallExtensionTableHandlerProc will return the current
  298. ;                            ExtensionTableHandle. You don't own the handle itself and
  299. ;                            must not dispose of it, but you can change the extElementIndex.
  300. ;                            the extElementCount, and the ExtensionElements in the table.
  301. ;
  302. ;    Results:
  303. ;        noErr        0        The ExtensionTableHandlerUPP was installed.
  304. ;        paramErr    -50        Another ExtensionTableHandlerUPP has already been installed.
  305. ;        memFullErr    -108    Not enough memory to install the ExtensionTableHandlerUPP.
  306. ;
  307.  
  308. ;
  309. ; pascal OSErr InstallExtensionTableHandlerProc(ExtensionTableHandlerUPP extMgrProc, ExtensionTableHandle *extTable)
  310. ;
  311.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  312.         Macro
  313.         _InstallExtensionTableHandlerProc
  314.             moveq               #2,D0
  315.             dc.w                $AA7D
  316.         EndM
  317.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  318.         IMPORT_CFM_FUNCTION InstallExtensionTableHandlerProc
  319.     ENDIF
  320.  
  321.  
  322. ; 
  323. ;    RemoveExtensionTableHandlerProc
  324. ;
  325. ;    Remove an ExtensionTableUPP. Control is passed back to the default handler.
  326. ;
  327. ;    Parameters:
  328. ;        extMgrProc            The ExtensionTableUPP to remove.
  329. ;
  330. ;    Results:
  331. ;        noErr        0        The ExtensionTableUPP was removed.
  332. ;        paramErr    -50        This ExtensionTableUPP was not installed,
  333. ;                            or the ExtensionTable no longer matches the
  334. ;                            original boot ExtensionTable.
  335. ;
  336.  
  337. ;
  338. ; pascal OSErr RemoveExtensionTableHandlerProc(ExtensionTableHandlerUPP extMgrProc)
  339. ;
  340.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  341.         Macro
  342.         _RemoveExtensionTableHandlerProc
  343.             moveq               #3,D0
  344.             dc.w                $AA7D
  345.         EndM
  346.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  347.         IMPORT_CFM_FUNCTION RemoveExtensionTableHandlerProc
  348.     ENDIF
  349.  
  350.     ENDIF ; __START__ 
  351.  
  352.